home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / v9n02.arc / ERRLEV.BAT < prev    next >
DOS Batch File  |  1990-01-02  |  546b  |  19 lines
  1. @ECHO OFF
  2. SET E=
  3. FOR %%v IN (0 1 2) DO IF ErrorLevel %%v00 SET EL=%%v
  4. IF "%EL%"=="2" GOTO over200
  5. FOR %%v IN (0 1 2 3 4 5 6 7 8 9) DO IF ErrorLevel %EL%%%v0 SET EL=%EL%%%v
  6. GOTO digit2
  7.   :over200
  8.   FOR %%v IN (0 1 2 3 4 5) DO IF ErrorLevel %EL%%%v0 SET EL=%EL%%%v
  9. :digit2
  10. IF "%EL%"=="25" GOTO over250
  11. GOTO digit3
  12.   :over250
  13.   FOR %%v IN (0 1 2 3 4 5) DO IF Errorlevel %EL%%%v SET EL=%EL%%%v
  14.   GOTO done
  15. :digit3
  16. FOR %%v IN (0 1 2 3 4 5 6 7 8 9) DO IF ErrorLevel %EL%%%v SET EL=%EL%%%v
  17. :done
  18. ECHO The resulting ERRORLEVEL is %EL%
  19.